home *** CD-ROM | disk | FTP | other *** search
/ Gekikoh Dennoh Club 1 / Gekikoh Dennoh Club Vol. 1 (Japan).7z / Gekikoh Dennoh Club Vol. 1 (Japan) (Track 1).bin / tools / xb / sample / xbsample.doc < prev   
Text File  |  1996-12-08  |  5KB  |  154 lines

  1. ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
  2.  
  3.     ぺけ-BASICのサンプルプログラム
  4.  
  5. ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
  6.  
  7.  
  8.   ぺけ-BASICの拡張機能と付属の外部関数を使用したサンプルプログラ
  9. ムです。マニュアルと合わせて御覧いただくとわかりやすいのではと思います。
  10.  
  11.  
  12.  
  13.  
  14. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  15.     xbc_inst.bas
  16. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  17.  
  18.   拡張機能のラベルと外部関数 getenv(), _system() を使用した、ぺけ-BA
  19. StoCの簡易インストーラです。
  20.   XBC001B.LZH をラムディスク上などに展開した後、そのディレクトリで実行
  21. すると、インストールしてくれます。
  22.   この例では COPY しか使用していませんが、他の内部コマンドや外部コマン
  23. ドも使用出来るので、今までバッチファイルでやっていたことが、BASIC
  24. で簡単に実現出来ます。
  25.  
  26.  
  27. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  28.     files.bas
  29. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  30.  
  31.   拡張機能のコマンドラインの引き数取り込み、及び可変長配列と、外部関数
  32. filesnum(), files() を使用したサンプルです。
  33.   コマンドラインにて指定したファイル(複数指定・ワイルドカードも可)と
  34. そのサイズを表示します。
  35.   これらを使えば、ファイルを選ぶメニューが容易に作成出来ると思います。
  36.  
  37.  
  38. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  39.     drvctrl.bas
  40. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  41.  
  42.   外部関数 drvctrl() を使用したサンプルです。
  43.   実行すると、ドライブ番号の若い方から 2HD を探し、LEDを点滅させて
  44. ディスクの挿入をうながし、イジェクトも行います。
  45.  
  46.  
  47. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  48.     iocs1.bas
  49. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  50.  
  51.   外部関数 iocs() を使用したサンプルです。
  52.   IOCS CALL _FNTGET で 16 dot フォントパターンを読み出して、画面上に表
  53. 示します。
  54.  
  55.  
  56. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  57.     iocs2.bas
  58. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  59.  
  60.   外部関数 iocs(), _arp(), wpoke() を使用したサンプルです。
  61.   IOCS CALL _TXLINE で、テキストプレーン 0,1 上にランダムに直線を引き
  62. ます。
  63.  
  64.  
  65. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  66.     halftone.bas
  67. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  68.  
  69.   外部関数 v_priority() を使用したサンプルです。
  70.   半透明動作を行います。
  71.  
  72.  
  73. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  74.     rastest1.bas
  75. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  76.  
  77.   外部関数 spfile_def(), palfile_def(), ras_scroll_set(),
  78. ras_scroll_stat() を使用したサンプルです。
  79.   うねうねスクロールの上を 64 匹の猫が走ります。ラスタスクロールさせな
  80. がら 128 枚のスプライトを動かすことが出来る、というわかりやすいデモで
  81. す。
  82.   電脳倶楽部83号をお持ちなら、「我夢我行」の「ふふやや」をバックに鳴
  83. らしてみるというのも雰囲気に合っていて、ぐー。ZMUSIC を常駐させる時は、
  84.  -M option で多重割り込みモードにすることを忘れずに。PCM を使うと残念
  85. ながら画面が乱れてしまいますが、こればっかりはどうしようもないです。
  86.  
  87.  
  88. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  89.     rasmake.bas
  90.     rastest2.bas
  91. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  92.  
  93.   上記の外部関数に加え、ras_home(), lzh_extend(), _system() を使用した
  94. サンプルです。
  95.   ラスタスクロール用のデータは繰り返し部分が多いので、LHA.X で圧縮する
  96. と大概 5% 未満になります。そこであらかじめデータを作っておいて、
  97. lzh_extend() で読み込ませることにより、データ作成で待たされることがな
  98. くなります(lzh_extend() の展開速度は十分高速です)。
  99.   またこのサンプルでは ras_home() を使って、ラスタスクロールをジョイス
  100. ティック1で上下左右にスクロールさせることができます。
  101.  
  102.  
  103. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  104.     title1.bas
  105. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  106.  
  107.   ラスタスクロールによるタイトル出現のサンプルです。
  108.   肝心のタイトルがへぼいのは御愛敬。
  109.  
  110.  
  111. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  112.     title2.bas
  113. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  114.  
  115.   同じくラスタスクロールによるタイトル出現のサンプルです。
  116.  
  117.  
  118. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  119.     title3.bas
  120. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  121.  
  122.   グラフィック画面を使ったタイトル出現のサンプルです。
  123.   両側からざわわと現れます。
  124.  
  125.  
  126. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  127.     2dan.bas
  128. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  129.  
  130.   二段独立スクロールです。上半分をジョイスティック1、下半分をジョイス
  131. ティック2で上下左右に動かせます。
  132.   高クロックマシンや X68030 等を使用の方は、ウェイト用のループのカウン
  133. タを増やしておかないと、滅茶苦茶になるかもしれません。
  134.  
  135.  
  136. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  137.     okuyuki.bas
  138. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  139.  
  140.   対戦格闘の床でやってる、奥行きつきスクロールの真似事です。本当はもう
  141. ちょっとマジメにやらないといけません。
  142.   ジョイスティック1の左右で動かしてみましょう。
  143.  
  144.  
  145.  
  146.  
  147.  
  148. ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
  149.     平成 7 年 6 月 16 日
  150.                             中谷  秀洋
  151.         でんでんネット               DEN1608  ( AKSTN. )
  152. ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
  153.  
  154.